home *** CD-ROM | disk | FTP | other *** search
/ Know Your Hockey - The Greatest Player Resource / Know Your Hockey: The Greatest Player Resource.iso / hockey / director / ssqcst.cst / 00034_Script_Load Starter Media < prev    next >
Text File  |  1998-09-28  |  3KB  |  107 lines
  1. global gButtonState,gClipOut,gXCast,gSoundlevel
  2. -- attach this button to the pro button to display the intro play video
  3. -- these two scripts also alter the gTheBench property list to load the intro coach and announcer sounds
  4. -- the opening description audio file is placed in the first exit frame script of the movie be called
  5.  
  6.  
  7. -- hard script the name of the intro videos here ( in bold)
  8. on IntroPro theone
  9.   if the type of sprite 48 > 0 then set the movierate of sprite 48 = 0
  10.   ClearTheDeck
  11.   puppetsprite 48, 1
  12.   set the type of sprite 48 = 0
  13.   set the membernum of sprite 48 = 0
  14.   updatestage
  15.   puppetsound 0
  16.   set the type of sprite 48 = 16
  17.   set the membernum of sprite 48 = theone 
  18.   set the ink of sprite 48 = 32
  19.   set the locv of sprite 48 = 104
  20.   set the loch of sprite 48 = 148
  21.   set the visible of sprite 48 =1
  22.   clearIconStatus
  23.   -- sets the end point for the script videoplayer
  24.  set  gClipOut = the duration of member  theone  -30
  25.   updateStage
  26.   set the movierate of sprite 48 = 0  
  27.   set the membernum of sprite 3 = member "play"
  28.   set the blend of sprite 3 = 100
  29.   setVideoVolume
  30.   updateStage
  31. end
  32.  
  33.  
  34.  
  35. on IntroJr theone
  36.   if the type of sprite 48 > 0 then set the movierate of sprite 48 = 0
  37.   losepop(window "pop")
  38.   ClearTheDeck
  39.   puppetsprite 48, 1
  40.   set the type of sprite 48 = 0
  41.   set the membernum of sprite 48 = 0
  42.   updatestage
  43.   puppetsound 0
  44.   set the type of sprite 48 = 16
  45.   set the membernum of sprite 48 = theone
  46.   set the ink of sprite 48 = 32
  47.   set the locv of sprite 48 = 104
  48.   set the loch of sprite 48 = 148
  49.   set the visible of sprite 48 =1
  50.   clearIconStatus
  51.   -- sets the end point for the script videoplayer
  52.   set  gClipOut = the duration of member  theone  -30
  53.   updateStage
  54.   set the movierate of sprite 48 = 0  
  55.   set the membernum of sprite 3 = member "play"
  56.   set the blend of sprite 3 = 100
  57.   setvideovolume
  58.   updateStage
  59. end
  60.  
  61.  
  62. --- this script clears the screen if the pro or junoir button is selected
  63. -- when a card is on the screen
  64.  
  65. on ClearTheDeck
  66.   -- turns of f the card and text card
  67.   repeat with x = 5 to 9
  68.     set the membernum of sprite x =0
  69.     set the type of sprite x = 0
  70.   end repeat
  71.   -- clear the card slider
  72.   
  73.   repeat with x = 28 to 30
  74.     set the membernum of sprite x =0
  75.     set the type of sprite x = 0
  76.   end repeat
  77.   clearIconStatus -- clean the icon hilite list
  78.   
  79.   -- turns off the icon cards
  80.   repeat with x = 42 to 46
  81.     set the membernum of sprite x =0
  82.     set the type of sprite x = 0
  83.   end repeat
  84.   
  85. end
  86.  
  87.  
  88. -- looks at gButtonState to see if an Icon has been selected 
  89. -- if it has then is double checks to see if a member exists in the sprite
  90. -- after this is resets the membernum of the sprite to the off member
  91. -- this script is also used by the player handler
  92.  
  93. on clearIconStatus
  94.   repeat with x = 44 to 46
  95.     set test  = getat(gButtonState,x)
  96.     if test > 0 and the membernum of sprite x > 0 then 
  97.       set i = the membernum of sprite x
  98.       set the membernum of sprite x = i-1
  99.       setat(gButtonState,X,0)
  100.       updatestage
  101.       exit repeat -- should only be one hilited so we can exit here to save a bit of time
  102.     end if
  103.   end repeat
  104. end
  105.  
  106.  
  107.